1 / 31/91 


PROM IS ANALYSIS 


SOURCE CODE ANALYSIS 

1. The beginning of each source module contains documentation 
listing the changes made to that module, in reverse chronological 
order. The Summary of Privately Funded Changes to PROMIS chart 
lists changes to source modules: the change number, bug 
report/reguest for change date, change date, programmer name, 
source module, description of change, and project charge code. 
Look in the program/module column for the name of the source 
module. Using the system editor software, bring the source 
module up on the screen. Review the documentation section for 
the associated change number in that source code. 

On the off chance that this documentation has been deleted, 
look for change markers within the source code. All changes are 
book-marked in the following format: 

before the change: *>* xxxx.mmddyy, where xxxx is the 

change number 

after the change: *<* xxxx.mmddyy 

Use the editor to find this string, using a change number from 
the chart . 
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PROGRAM EXECUTION OR PROGRAM OUTPUT 

1. Menu screens should wrap from last screen to the first menu 
screen. Before change 0044 was added, when the user reached the 
last menu screen, he had to key in MENU to go back to the first 
menu . 

2. Review the Data Base Documentation Report (P10) to locate a 
translation record containing only one field (record label will 
usually say TRANS . . . and four character record code will be 
TRxx) . Bring up an Update screen, UPDT/Axxxx/(code) . The cursor 
should be positioned at the beginning of the data entry field. 
This is change 0047. 

3. Request an Update screen of any kind. Enter an error in any 
data field and an error in the next transaction request area. 
Error messages should be displayed to alert user to both errors. 
Before change 0056, only the data entry error would be displayed. 

4. In the P10 report, locate a record definition in the 
Transaction section in which one field (same) occurs multiple 
times in the record. (The NOTE field is a good one to look for.) 
Find the field in the Data Element section of the P10. The 
transaction cross-reference column identifies all records where 
the field is defined. The record code for the multiple 
occurrence should be listed only once, not for each field 
occurrence. This is change 0317. 

5. In the P10 report, see if the message "BLANK LINES SUPPRESSED 
(IN INQUIRY)?" appears at the end of the Translation Record 
section (immediately after the Logical Diagram). Adding this 
message is change 0325. 

6. Program PR0015 produces a report of system generation 
options. Originally the report showed sections for definition of 
Summary Inquiries, Update screen series, dittoed data elements 
and triggered transactions. Report Module page formats, and 
Historical Purge options. Change 0271 added a new section 
showing the order of entries on Inquiry Menus screens. This 
section will list the order for Case-related menus and Indexed 
Inquiry menus. Indexed inquiry menu part may not be present, 
depending on the Adabas use of indexes. 

7. Report from program PR0015 will show what Summary Inquiries 
are defined. Get the four-character code of one of these 
inquiries and perform the on-line request, QURY/Sxxxx/(case #) , 
where xxxx is the summary inquiry code and case # is a number of 
a non-existent case. The message returned should be "CASE RECORD 
NOT ON FILE" rather than "ERROR IN PREP-FILE STATUS 23". This is 
change 0169 in source module PN9974. 
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OTHER PROGRAM EXECTUTION OR PROGRAM OUTPUT 

The following changes may or may not be found. The 
Generalized Inquiry Package (GIP) may not be in use (change items 
1 and 4). Adabas as the DBMS will affect indexes, so it is 
uncertain if indexes still exist in the system in the original 
scheme (change items 2, 3, 5, and 6). 

1. See if the report from program PR0590 to print GIP report 
definitions is available. If the report is not available, then 
execute the program. There will be a series of questions to 
define the execution mode; respond "N" to the first three 
questions. The fourth question is "PRINT LIST OF ALL SAVED 
INQUIRIES (y or N)". Respond with "Y". This is change 0096 in 
program PR0590. 

2. Look in the Data Base Documentation Report (P10) in the Index 
section. Locate an index defined with a total key length of 44 
characters or more (total key comprises up to four fields defined 
as index keys). Perform the Tally function, TALY/xxxx/( first key 
field) on a value that will display multiple screens. The last 
entry on one screen should not repeat on the next screen. Change 
0211 corrected the duplicate display that previously occurred. 

3. Using the same report as in #2, locate an index with a key 
field that has a translation associated with the code. The Data 
Element section of the P10 will show if there is a translation 
record associated with the field. Perform the Tally inquiry. 

The response should display and page (multiple screens returned) 
properly. Without change 0252 in PR4220, a page/screen repeated 
over and over. 

4. Execute PR0510 to define a GIP using the "BLANK" reserved 
word to control the line formatting, or review the PR0590 report 
to see if the word is used. In defining a report, use "BLANK" in 
the PRINT statement, e.g., PRINT CS-CASENO CS-BRANCH BLANK 10 
CS-STATUS. This is change 0304 in PR0510. 

5. Look in the Data Base Documentation Report (P10) in the 
Transaction Section for a field with associated entries in 
columns 14 and 15 that identify the index(es) for which the field 
is used as a key. This is change 0324 in PR0010. 

6. Check the P10 report to see if a message is listed saying 
that the index display line is too long. Perform this indexed 
inquiry on-line and see that the last column is truncated. The 
screen line is 80 characters and a total of the field lengths for 
the display will be greater than 80. There are two MODU changes 
in PR3210 to enable this display. 
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USS-CO— LINE-GROUP" is generated when not needed causing 
compile errors in PR4300. 
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a c » 
ft ft o 
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ft ft •• 
•-1 ft 

B a- ^ 

5** 3 

ft rt ft 
3* 

rt C tJ 
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ft O 
*1 00 
ft ft H 

to J3 to 
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» f— 

ft ^ o. 

H* 

O 3 ft* 
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rr - O 


to ^ 3 
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o 3 r> 

3 * » 
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a ft • 

to rr o 
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ft 0 
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3 :H? 

rr H I 

« ft ? 
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9 *«J 

3 rt 3 ft 
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5. SrT 2 

£ m. rr 

^ 3 2 S' 
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.g » ~ O 
c _ . 

" 2 -i* 
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S rr 
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a 3 »i J 
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■O ft °* 
ft 

*1 r* r-. 
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. O. ft 
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‘ NUMBER DATE DATE PROCRAMMER PROCRAM/MODULE DESCRIPTION 





o 

SO 


CD 


a. o 
o n 
** 3 
* ft 


X 

ft 


Z 

n 

x 


o 

X 

-4 


a. 

to 


a 

c 

ft 

09 

n 


3* 

ft 


o 

ft 

x 3 

X ft 

o ft 


ij II 


cr 

ft 


■vo 

o 


*3 9* 
a ft ft 

nan 
-v » » 

0 a 0 
1X3 
3 ft 

ft >ti 

— > 0 

ft « * 

3*9 

1 ^ 3 

It V B 

" i* ft 


75 

C H 

X 3* 
-1 « 

X « 
X £ 
X ^ 

o 1 

*3 

--3 

ft 3 

< rr 
ft 

3 *3 

1 

rr <5 
— X 
Z ft 


Z * 

ft ft 
a. 
a 

0 a» 

1 3 
rr 

ft 

H 


o 

O' 


O'' 

00 


•3X3 
x x a 
O OX 
O' ct* ft 
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O O ft 
3 


X 

ft 

X 

o 

•1 


so 

o 
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ii 


o 

3 • 

ft 

o X 
ft x 
a. x 


8 « 

£.■§ 

* n 
* 3 
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O* * 

* rr 

?s 

O * 

n 

ft -o 


a x 

ft ft 

*-h 0 
H • X 

3 >1 

H* fi» 


O 

3 

S 3 

a. ►** 

• 

x 

2 ° 
2 ft 
2 * 

2 * 

® rr 

• ft 
H* ft. 


rr cr IB 

3- ft ft 

ft ft 

a C • 
ft « 0 
ft 0 

1 O. 

ft rn 
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ft ft 

£•- 9 

to 
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x * » 

ft X ft 
ft o •• 

ft ft 
a rr 

a a- J 

ft ft 
rr "» 

=T £• 3 

" 3 i 
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2 5 8. 


ft 

a 


5*0 g 2 

”* — O 
c 

9 rr 
3 ft 


2 ft 

£ n 

2 o 

o 2. 

a 

a 

3 ft 
ft- X 

X 

x j 
X ° 

o " 

QS ft 
0D ft. 


c a 

ft rr 
a f— 
0 

O* 3 

a 

a i 
ft ft 
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00 O- o 

° rr 0 ft 
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3 rr 
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ft 
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Is--? 

. £ " 

o* o 

a o 

rr n 

-• c 
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5* _ rr « 
T® 
ft ft 


a y 
?• 


3 X rr 'I r- 
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n 
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a 
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a 
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h- rl 

3 

O 
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0i 
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3 

3 
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S' 
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ri 
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^,”7 0 O 

*288.? 

3 r> 
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^ O 

i? 
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3 
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ft 

ft 

I s 

» ft a n -Q 
w 3 3 0 c 

3 ? 
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ft 
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9 

9 
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ft c 
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9 
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C ® 
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• ft 
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A 

ps 
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3T 

to 
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£ n 
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ft. * 
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a 

00 

X 9 
ft 90 

9 

9 

„ ^ Q. ® 
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2? 

«• 

ID (I 

3 * a 


3 

a rp 
»•• •« 


2 5 

I s 

ft 
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9 

9 
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\0 K » ^ ^ 
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ft s 

it 
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ft 3" 

7 0 
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0 

c 

r-» 

• 3 

^ -o a 

- « CL 

ft 2 ^ 

2 < 

'l a 

rr a 

0 

3 

ft 

=r 

a 3- 
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S 7 - 00 e 

O- Jz 
» 2. 

^ * 

a! O 
ft* 

the 

r*. 

3 

-Q r^ 

C rr, 

9 

9 

9 

9 

So’dJ 
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ft 

? ° 

a. 

ft 

^ _ 

ft" n 

ft 

ft 

3 
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cr 


M. 

9 
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rr 0 

ft 
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3* a. 
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"J 

ft 

ft 

3 

O 
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ft 
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E* rr 

3 

i i 

T 4 ft 0 ft* 

.** •" -S ^ 7 

ft ^ 

V*. 0 

3* 
ft ft 

a 

a 

a 

ft rr 
^ 3* 

ft 

9 

9 

9 

to H ° rr 

: 2 < 

a* a ~ 

rr 

“ rr 7 


ft >• a 

3 S 
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• 0 - g. 

2 ft 

ft 

ft 

a 

9 

3 3* j-f ^ 

CL r- ft ^ 

0 5 

2 5 

a cr 

T3 
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a- 

ft 

CL 

ft 

» 3 r- 

r- 

a a 

"O 

ft 

-♦ CL 
ft ft 
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rr v 
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jui 

ft 

ft 
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3. 3 

CL 

9 

9 

8 
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p 

01 

rr a ‘ 

3 - ftj 

r»« 

O* 

r-* 

ft 

M« 

rr 

r- r-. ® 

rr 

0 cr 
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>-• 

• rr, 

O ^ 

— x 

CL 0 

ft 

rr 

0 
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n 0 
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V 
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OQ 

a ft 

CL 

O 

3 

a rr 

ft 3 


a 

a 

CL 

■O 

rr 



0. s 


ft 

ft 

7 ' t» 
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^ ft 

ft 
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0 

0 

3 CL 
n * 
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a 
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3 

ft 

a 

nr 

« 

ft 

a 

B 

C 

0 
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CL c 
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2 o'l 
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§ rr 
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(9 
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a. 
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a 


3 

■o 


ft 

ft 

T3 

O 
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a 3 3 
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Co^»eiit: Change to improve error reporting. Involves 

changes to PN9951 and PN9955. This change also forces a dump 
(divide by zero) if an unsuccessful read of the matrix file 
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